<?php
declare(strict_types=1);

/**
 * 图形验证码
 */
class Captcha
{
    // 验证码字符集合
    protected string $codeSet = '2345678abcdefhijkmnpqrstuvwxyzABCDEFGHJKLMNPQRTUVWXY';

    protected string $zhSet = '不说种过命度革而多子后自社加小机也经力线本电高量长党们以我到他着水理化争现产的一是工就年阶义发成部会作时要动国和有大这主中人上为来分生对于学下级地个用同行面得实家定深法表民可出能方进在了所二起政三好十战无农使性前等反体合斗路图把结第里正新开论之物从当两些还天资事队批点育重其思与间内去因件日利相由压员气业代全组数果期导平各基或月毛然如应形想制心样干都向变关问比展那它最及外没看治提五解系林者米群头意只明四道马认次文通但条较克又公孔领军流入接席位情运器并飞原油放立题质指建区验活众很教决特此常石强极土少已根共直团统式转别造务被整联步类集号列温装即毫知切九你取西持总料连任志观调七么山程百报更见必真保热委手改管处己将修支识究书术状厂须离再目海交权且儿青才证低越际八试规斯近注办布门铁需走议县兵固除般引齿病象几先老光专什六型具示复安带每东增则完风回南广劳轮科北打积车计给节做轴研单色坚据速防史拉世设达尔场织历花受求传口断况采精金界品判参层止边清至万确千段算适讲按值美态黄易彪服早班麦削信排台声该击素张密害侯草何树肥继胜细影济白格效置推空配刀叶率述今选养德话查差半敌始片施响收华觉备名红续均药标记难存首尺波承粉践府鱼随考刻靠够满夫失包住促枝局菌杆周护岩师举曲春元超负砂封换太模贫减阳扬江析亩木言球朝医校古呢稻宋听唯输滑站另卫字鼓刚写刘微略范供阿块某功套友限项测士身紧液派准斤角降维板许破述技消底床田势端感往神便贺村构照容非搞亚磨族火右属市严径螺检左页抗苏显苦英快称坏移约巴材省黑武培著河帝仅针怎植京助升王眼她抓含苗副杂普谈围食射源例致酸旧却充轻血倍缺厘泵察绝富城冲喷壤简否柱李望盘磁雄似困巩益洲脱投送奴侧润盖挥距触星松送获兴独官混纪依未突架宽冬章湿偏纹吃执阀矿寨责熟稳夺硬价努足短划剂宣环落余倒卷创律雨让骨远帮初皮播优占死毒圈伟季训控激找叫云互跟裂粮粒母练塞钢顶策双留误础吸阻故寸盾晚丝女散焊功株亲院冷彻弹错散商视艺灭版烈零室翻奇甲预职评读背协损棉侵灰虽矛厚罗泥辟告卵箱掌氧恩爱停曾溶营终纲孟钱待尽俄缩沙退陈讨奋械载胞幼哪剥迫旋征槽倒握担仍呀鲜吧卡粗介钻逐弱脚怕盐末阴丰雾冠丙街莱贝辐肠付吉渗瑞惊顿挤秒悬姆烂森糖圣凹陶词迟蚕亿矩康遵牧遭幅园腔订香肉弟屋敏恢忘编印蜂急拿扩伤飞露核缘游振操央伍域甚迅辉异序免纸夜乡久隶缸夹念兰映沟乙吗儒杀汽磷艰晶插埃燃欢铁补咱芽永瓦倾阵碳演威附牙芽永瓦斜灌欧献顺猪洋腐请透司危括脉宜笑若尾束壮暴企菜穗楚汉愈绿拖牛份染既秋遍锻玉夏疗尖殖井费州访吹荣铜沿替滚客召旱悟刺脑措贯藏敢令隙炉壳硫煤迎铸粘探临薄旬善福纵择礼愿伏残雷延烟句纯渐耕跑泽慢栽鲁赤繁境潮横掉锥希池败船假亮谓托伙哲怀割摆贡呈劲财仪沉炼麻罪祖息车穿货销齐鼠抽画饲龙库守筑房歌寒喜哥洗蚀废纳腹乎录镜妇恶脂庄擦险赞钟摇典柄辩竹谷卖乱虚桥奥伯赶垂途额壁网截野遗静谋弄挂课镇妄盛耐援扎虑键归符庆聚绕摩忙舞遇索顾胶羊湖钉仁音迹碎伸灯避泛亡答勇频皇柳哈揭甘诺概宪浓岛袭谁洪谢炮浇斑讯懂灵蛋闭孩释乳巨徒私银伊景坦累匀霉杜乐勒隔弯绩招绍胡呼痛峰零柴簧午跳居尚丁秦稍追梁折耗碱殊岗挖氏刃剧堆赫荷胸衡勤膜篇登驻案刊秧缓凸役剪川雪链渔啦脸户洛孢勃盟买杨宗焦赛旗滤硅炭股坐蒸凝竟陷枪黎救冒暗洞犯筒您宋弧爆谬涂味津臂障褐陆啊健尊豆拔莫抵桑坡缝警挑污冰柬嘴啥饭塑寄赵喊垫丹渡耳刨虎笔稀昆浪萨茶滴浅拥穴覆伦娘吨浸袖珠雌妈紫戏塔锤震岁貌洁剖牢锋疑霸闪埔猛诉刷狠忽灾闹乔唐漏闻沈熔氯荒茎男凡抢像浆旁玻亦忠唱蒙予纷捕锁尤乘乌智淡允叛畜俘摸锈扫毕璃宝芯爷鉴秘净蒋钙肩腾枯抛轨堂拌爸循诱祝励肯酒绳穷塘燥泡袋朗喂铝软渠颗惯贸粪综墙趋彼届墨碍启逆卸航衣孙龄岭骗休借';

    // 验证码过期时间（s）
    protected int $expire = 60;

    protected  $im = null;

    //图片宽度
    protected int $imageW;

    //图片高度
    protected int $imageH;

    // 验证码字体大小(px)
    protected int $fontSize = 18;

    //颜色
    protected $color;

    //使用算数验证码
    protected bool $math = false;

    // 使用中文验证码
    protected bool $useZh = false;

    //验证码长度
    protected int $length = 5;

    /**
     * 初始化
     */
    public function __construct()
    {
        $config  = Config::get("captcha");
        $this->length = (int)$config["length"] ?? $this->length;
        $this->math = (bool)$config["math"] ?? $this->math;
        $this->useZh = (bool)$config["useZh"] ?? $this->useZh;
    }

    /**
     * 创建验证码
     *
     * @return array
     * @throws Exception
     */
    protected function generate(): array
    {
        $bags = [];
        if ($this->math) {
            $this->useZh  = false;
            $num1 = rand(5,20);
            $num2 = rand(1,5);
            $symbols = ['+','-','x'];
            $symbol = $symbols[rand(0,2)];
            $key = match ($symbol) {
                '+' => $num1 + $num2,
                'x' => $num1 * $num2,
                default => $num1 - $num2,
            };

            $bags = [ $num1, $symbol, $num2, "=", "?" ];
            $this->length = 5;
        } else {
            $bag = '';
            if ($this->useZh) {
                $characters = preg_split('/(?<!^)(?!$)/u', $this->zhSet);
            } else {
                $characters = str_split($this->codeSet);
            }
            for ($i = 0; $i < $this->length; $i++) {
                $char = $characters[random_int(0, count($characters) - 1)];
                $bag.= $char;
                $bags[] = $char;
            }
            $key = mb_strtolower($bag, 'UTF-8');
        }
        $salt = get_rand_char();
        $keys = generate_password((string)$key,$salt);
        Cache::set($keys,['key'=>$key,'salt'=>$salt,'hash'=>$keys],$this->expire);
        return [
            'key'=>$keys,
            'characters'=>$bags
        ];
    }

    /**
     * 验证图形验证码
     *
     * @param string $code
     * @param string $key
     * @return bool
     */
    public function verify(string $code,string $key):bool
    {
        $data = Cache::get($key);
        if (!$data) return false;
        $code = mb_strtolower($code, 'UTF-8');
        $res = password_verify($code.$data['salt'],$data['hash']);
        if ($res) {
            Cache::delete($key);
        }
        return $res;
    }

    /**
     * 生成图形验证码
     *
     * @return array
     * @throws Exception
     */
    public function getCode(): array
    {
        if ($this->math) {
            // 图片宽(px)
            $this->imageW = (int)($this->length * $this->fontSize + $this->length * $this->fontSize / 2);
        }else {
            $this->imageW = (int)($this->length * $this->fontSize * 1.5 + $this->length * $this->fontSize / 2);
        }
        // 图片高(px)
        $this->imageH = (int)($this->fontSize * 2.5);
        // 建立一幅 $imageW x $imageH 的图像
        $this->im = imagecreate($this->imageW, $this->imageH);
        // 设置背景
        imagecolorallocate( $this->im, 255, 255, 255);
        // 验证码字体随机颜色
        $this->color = imagecolorallocate( $this->im, mt_rand(1, 150), mt_rand(1, 150), mt_rand(1, 150));
        // 验证码使用随机字体
        $fontttf = __DIR__ . '/fonts/1.OTF';
        // 绘杂点
        $this->writeNoise();
        if (!$this->math) {
            // 绘干扰线
            $this->writeCurve();
        }
        // 绘验证码
        $generator = $this->generate();
        foreach ($generator['characters'] as $index => $char) {
            $x     = $this->fontSize * ($index + 1) * ($this->math ? 1 : 1.5);
            $y     = $this->fontSize + mt_rand(10, 20);
            $angle = $this->math ? 0 : mt_rand(-40, 40);
            imagettftext( $this->im, $this->fontSize, $angle, (int)$x, $y, $this->color, $fontttf, (string)$char);
        }
        // 输出图像
        imagepng( $this->im,__DIR__ . '/fonts/'.md5($generator['key']).".png");
        imagedestroy( $this->im);
        $file = file_get_contents(__DIR__ . '/fonts/'.md5($generator['key']).".png");
        unlink(__DIR__ . '/fonts/'.md5($generator['key']).".png");
        return [
            'captchaKey'=>$generator['key'],
            'captchaBase64'=>"data:image/png;base64,".base64_encode($file),
        ];
    }

    /**
      画一条由两条连在一起构成的随机正弦函数曲线作干扰线(你可以改成更帅的曲线函数)

          高中的数学公式咋都忘了涅，写出来
            正弦型函数解析式：y=Asin(ωx+φ)+b
           各常数值对函数图像的影响：
             A：决定峰值（即纵向拉伸压缩的倍数）
             b：表示波形在Y轴的位置关系或纵向移动距离（上加下减）
             φ：决定波形与X轴位置关系或横向移动距离（左加右减）
             ω：决定周期（最小正周期T=2π/∣ω∣）
     * @return void
     */
    protected function writeCurve(): void
    {
        $px = $py = 0;
        // 曲线前部分
        $A = mt_rand(1, (int)($this->imageH / 2)); // 振幅
        $b = mt_rand((int)(-$this->imageH / 4), (int)($this->imageH / 4)); // Y轴方向偏移量
        $f = mt_rand((int)(-$this->imageH / 4), (int)($this->imageH / 4)); // X轴方向偏移量
        $T = mt_rand($this->imageH, $this->imageW * 2); // 周期
        $w = (2 * M_PI) / $T;

        $px1 = 0; // 曲线横坐标起始位置
        $px2 = mt_rand((int)($this->imageW / 2), (int)($this->imageW * 0.8)); // 曲线横坐标结束位置

        for ($px = $px1; $px <= $px2; $px = $px + 1) {
            if (0 != $w) {
                $py = $A * sin($w * $px + $f) + $b + $this->imageH / 2; // y = Asin(ωx+φ) + b
                $i  = (int) ($this->fontSize / 5);
                while ($i > 0) {
                    imagesetpixel($this->im, (int)($px + $i), (int)($py + $i), $this->color); // 这里(while)循环画像素点比imagettftext和imagestring用字体大小一次画出（不用这while循环）性能要好很多
                    $i--;
                }
            }
        }

        // 曲线后部分
        $A   = mt_rand(1, (int)($this->imageH / 2)); // 振幅
        $f   = mt_rand((int)(-$this->imageH / 4), (int)($this->imageH / 4)); // X轴方向偏移量
        $T   = mt_rand($this->imageH, $this->imageW * 2); // 周期
        $w   = (2 * M_PI) / $T;
        $b   = $py - $A * sin($w * $px + $f) - $this->imageH / 2;
        $px1 = $px2;
        $px2 = $this->imageW;

        for ($px = $px1; $px <= $px2; $px = $px + 1) {
            if (0 != $w) {
                $py = $A * sin($w * $px + $f) + $b + $this->imageH / 2; // y = Asin(ωx+φ) + b
                $i  = (int) ($this->fontSize / 5);
                while ($i > 0) {
                    imagesetpixel($this->im, (int)($px + $i), (int)($py + $i), $this->color);
                    $i--;
                }
            }
        }
    }

    /**
     * 画杂点 往图片上写不同颜色的字母或数字
     * @return void
     */
    protected function writeNoise(): void
    {
        $codeSet = '2345678abcdefhijkmnpqrstuvwxyz';
        for ($i = 0; $i < 10; $i++) {
            //杂点颜色
            $noiseColor = imagecolorallocate($this->im, mt_rand(150, 225), mt_rand(150, 225), mt_rand(150, 225));
            for ($j = 0; $j < 5; $j++) {
                // 绘杂点
                imagestring($this->im, 2, mt_rand(-10, $this->imageW), mt_rand(-10, $this->imageH), $codeSet[mt_rand(0, 29)], $noiseColor);
            }
        }
    }
}
